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SPECIAL CHARACTERS 



<break> 



<enter> 



Shift® 

Shifts 

Shift- 

Shiftt 

<clear> 



Interrupts program execution and returns 
to BASIC command level 

Ends every line typed in 

Erases last character typed 

Tab (8 columns) 

Breaks a logical line 

into physical lines (linefeed) 

Toggles output pause switch 

Erases line being typed 

Converts display to 32 characters per line 

Escape 

Clears display and converts to 
64 characters per line 

Separates statements 
typed on the same line 



& 


Octal constant 


&o 


Octal constant 


&H 


Hexadecimal constant 



NOTE: Level III statements, commands and functions 
are printed in red. 



VARIABLE TYPE DECLARATION 
CHARACTERS 

Storage Bytes Used 

$ String (0 to 255 characters) 3 + # of characters 

% Integer (- 32768 to 32767) 2 

! Single precision (7.1 digit floating 4 

point) 

# Double precision (16.8 digit floating 8 

point) 

SHIFT-KEY ENTRIES 



Shift 


Sequence 


Shift 


Sequence 


A 


AUTO 


N 


NEXT 


B 


GET@( 





PRINT USING 


C 


ELSE 


P 


PUT@( 


D 


EDIT <enter> 


Q 


RETURN 


E 


EDIT 


R 


RUN<enter> 


F 


GOTO 


S 


SAVE" 


G 


GOSUB 


T 


THEN 


H 


INKEYS 


U 


TIMES 


I 


INPUT 


V 


LOAD" 


J 


LINE INPUT 


w 


LEFT$( 


K 


LINE( 


X 


MID$( 


L 


LIST 


Y 


RIGHT$( 


M 


LSET 


2 


STRINGS! 


OPERATORS 






Symbol 


Function 


- 




Assignment, or equality test 


- 




Negation or subtraction 


+ 




Addition or string concatenation 


* 

/ 




Multiplication 

Division (floating point result) 


A 




Exponentiation 



NOT 

AND 

OR 

= <> 
<= =< 
>= => 
<> 



One's complement (integer) 

Bitwise AND (integer) 

Bitwise OR (integer) 

Relational test (result is 
TRUE= -1 or FALSE = 0) 



The precedence of operators is: 

(1) Expressions in parentheses 

(2) Exponentiation (AAB) 

(3) Negation (-X) 

(4) *,/ 

(5) + , - 

(6) Relational operators ( = , <>, <, >, < = , > = ) 

(7) NOT 

(8) AND 

(9) OR 

ABBREVIATIONS 

? Equivalent to PRINT 

(Note: L? is not equivalent to LPRINT) 

Current line for EDIT, NAME, DELETE 
LIST, LLIST commands 

, Use in place of REM 



COMMANDS 



Command Syntax/Function 
AUTO 



CLEAR 



CLOAD 



CMD 



Example 

AUTO [first number[,increment]] AUTO 10, 10 
Turn on automatic line numbering 

CLEAR [n] CLEAR 100 

Clear program variables. 
Optional argument sets string 
space size. 

CLOAD "filename" CLOAD "A" 

Load program from cassette tape 
(Superseded by LOAD in Level III) 

CMD "T" CMD "T" 

Turn off real time clock 





CMD "R" 




CMD "R" 




Restart real time clock 








CMD "R","mm dd yy hh mm 


ss ' 


CMD "R", "02 24 




Set date and time for TIMES 




79 15 04 33" 


CONT 


CONT 

Continue program execution 




CONT 


CSAVE 


CSAVE "filename" 




CSAVE "B" 



Store the resident program on 

cassette tape 

(Superseded by SAVE in Level III) 



DELETE 


DELETE [[start line][-[end line]]] 
Delete line(s) 


DELETE 20-50 


EDIT 


EDIT line number 

Edit a program line. 

See EDIT MODE subcommands. 


EDIT 130 


LIST 


LIST [start line][-[end line]] 

List program lines at the terminal 


LIST 100-1000 


LLIST 


LLIST [start line][-[end line]] 
List program lines at the line 
printer 


LLIST 50-250 


LOAD 


LOAD "filename" 

Load program from cassette tape 


LOAD "B" 


NEW 


NEW 

Delete current program and 
variables 


NEW 


NAME 


NAME [[new number][,[old number][, increment]]] 




Renumber program lines 


NAME 100..100 


RUN 


RUN [line number] 


RUN 




Run a program (from line number) 


RUN 50 


SAVE 




SAVE "X" 



Store the resident program on 
cassette tape 

SYSTEM SYSTEM 

Enter monitor mode to load 
machine language file from 
cassette tape 



TROFF 


TROFF 




Turn Trace off 


TRON 


TRON 




Turn Trace on 



SYSTEM 



TROFF 



TRON 



EDIT MODE SUBCOMMANDS 
(<escape> is shift t) 

Command Function 

A Restart EDIT at the start of the line 

nCc Change n charaoter(s) 

nD Delete n character(s) at the current 

position 

E End editing and save changes but don't 

type the rest of the line 

H string<escape> Delete the rest of the line and insert string 

I string<escape> Insert string at current position 

nKc Kill all characters up to the nth 

occurrence of c 

L Print the rest of the line and go to the 

start of the line 

Q Quit and cancel all changes 

nSc Search for nth occurrence of c 

X string<escape> Go to the end of the line and insert string 

n<space> Move cursor n spaces to the right 

n— Move cursor n spaces to the left 

<enter> End editing and save changes 

Note: A string argument can be terminated with <enter>. 
The effect is equivalent to string<escape> <enter>. 



PROGRAM STATEMENTS 
(except I/O) 

Statement Syntax/Function Example 

DEF DEF FNx [(argument list)] = expression 

Define an arithmetic or 
string function DEF FNAtX, Y) = (X * X * + Y + Y) 

DEF USHn = address DEF USR3 = &2000 

Define the entry address 
for the nth assembly 
language subroutine 



DEFDBL DEFtype letter[-letter] 
DEFINT Define double precision, 



DEFDBL A, B, E-G 
DEFINT l-N 



DEFSNG integer, single precision, 
DEFSTR or siring default variable 
names 



DEFSNG X-Z 



GOTO 



IF 



LET 



LSET 



DIM A(3), B$(10,2,3) 
DIM Z(2* I) 



END 



ERROR 17 



DIM DIM variable (size1[,size2... 

Allocate space for arrays. 
Arrays may be dimen- 
sioned dynamically. 

END END 

Stop program and 
return to BASIC 
command level 

ERROR ERROR code 

Generate error of code 
(see table). May call 
user ON ERROR routine 
or force BASIC to 
handle error. 

FOR FOR variable=expression FOR 1=1 to STEP .5 

TO expression [STEP expression] 
Used with NEXT statement 
to repeat a sequence of 
program lines. The variable 
is incremented by the 
value of STEP. 



GOSUB GOSUB line number 

Call a BASIC subroutine by 
branching to the specified 
line number. See RETURN. 



GOTO line number 
Branch to specified line 
number 



GOSUB 210 



GOTO 90 



IF expression 
[THEN] statement 
[ELSE statement...] 
The logical relation in 
expression is tested. If 
true, the THEN clause is 
executed. If false, the 
ELSE clause is executed. 



IF X<Y THEN Y = X ELSE Y = A 



[LET] variable = expression 


LETX = l + 5 


Assign a value to a 


4 = 44 


variable 




LSET RESET 


LSET RESET 


Turn off 




shift-key entries 





LSET SET 

Turn shift-key entries 
back on 

LSET LIST 

List shilt-key entries 

LSET letter = string 

expression 

Define a new shift-key 



LSET SET 

LSET LIST 
LSETM = "MAXIMUM" 



ON 
ERROR 
GOTO 



ON. .. 
GOSUB 



NEXT NEXT variable[,variable...] 

Delimits the end of a 
FOR loop. 

ON ERROR GOTO line 
number 

Enables error trap 
subroutine beginning at 
specified line. If line 
number = 0, disables error 
trapping. If Itne number = 
inside error trap routine, 
forces BASIC to handle 
error 

ON expression GOSUB 

HneLllne...] 

GOSUB to statement 

specified in list by 

expression. (If J + 1 = 1, 

to 20; if J + 1 = 2, to 20; 

it J +1 = 3, to 40) 

ON... ON expression GOTO 

GOTO line[,line...] 

Branch to statement in list 
specified by expression. 
(To 20 if 1=1, to 30 if I = 2) 

OUT OUT port, byte 

Puts byte 16 + I to output 
port 41. 

POKE POKE location, byte 

Puts byte specified into 
memory location specified 

RANDOM RANDOM 

Reseeds random number 
generator 



NEXT I 



ON ERROR GOTO 
1000 



ON J + 1 GOSUB 
20,20,40 



ON I GOTO 20,30 



OUT 41, 16 + 1 



POKE 23100,255 



RANDOM 



REM REM any text REM TEST X 

Allows comments In 
program (not executed). 
NOTE: "." does not ter- 
minate a REM statement. 

RESTORE RESTORE RESTORE 

Resets DATA pointer so 
DATA statements may be 
re-read 

RESUME RESUME or RESUME RESUME 

Returns from ON. ..ERROR 
routine to statement that 
caused error 



RESUME NEXT 
Returns to statement after 
the one that caused the 
error 

RESUME line number 
Returns to the specified 
line 

RETURN RETURN 

Return from subroutine to 
statement following last 
GOSUB performed 

STOP STOP 

Stop program execution, 
print BREAK message, and 
return to command level 



RESUME NEXT 



RESUME 200 



RETURN 



STOP 



INPUT/OUTPUT STATEMENTS 



Statement Syntax/Function 

DATA DATA item[,item... 



INPUT 



Example 

DATA 2.3,"PLUS",4 



Specifies data to be used in 
a READ statement 



INPUT[#LEN n,m;]["prompt string";]variable 

[.variable,..] 

Read data from the terminal. 

Optional LEN feature INPUT "VALUES" ;A,B 

branches to line m if no 

response alter n seconds. 



INPUT# INPUT#-1,item[,item...] 

Input data from cassette 



INPUT#-1,X,Y,B$ 



LINE LINE INPUT[#LEN n,m;]["prompt string";]variable 

INPUT [.variable...] 

Assign siring variable to line 

read from the terminal. LINE INPUT'TO; ";N$ 

Optional LEN feature 
branches to line m it no 



PRINT@28. "INDEX' 



PRINT PRINT exp[,exp...] PRINT A$ 

Print data at the terminal 

PRINT @ position,exp[,exp...] 
Print data at specified 
position on video display 

PRINT USING "format string";exp[,exp...] 

Print data at the terminal PRINT USING"!"; 

using the format specified. A$.B$ 

See table for format 

characters. 

LPRINT[USING "format string";]exp[,exp...] 
Print data at the line printer LPRINT A,B 
(using the format specified) 

PRINTS PRINT#-1,item[,item...j PRINT#-1.J.K.L 

Output data to cassette 

PRINT#-3,item[,item...J PRINT#-3,N,T$ - 

Output data to the 



READ READ variable[,variable...] 

Read data into specified 
variables from a DATA 
statement 



READ I.X.AS 



PRINT USING Format Field Specifiers 

Numeric 



c-,,-1- Possible Field _ _ ... 

SpeC,,,er Digits Characters De,,mtl0n 



Numeric field 
Decimal point 



Example 

#### 
#.# 



Print leading or trailing + ## 
sign. Positive numbers ### + 
will have " + ", 
negative numbers will 
have " - ". 



1 Trailing sign '■-" prints ##.##- 

-if negative, otherwise 
blank 

* * 2 2 Leading asterisk fill * * ###.## 

$$ 1 2 Floating dollar sign. $$##.## 

$ is placed in front of 
the leading digit. 

* *$ 2 3 Asterisk fill and **$#.## 

floating dollar sign 

, 1 1 Use comma every three##.###.## 

digits (left of decimal 
point only). 

AMA i Exponential format. #.##AAAji 

Number is aligned so 
leading digit is 
non-zero. 



String 

! Single character ! 

/<spaces>/ 2+ number of spaces / 

character field 



GRAPHICS STATEMENTS 

Statement Syntax/Function Example 

CLS CLS CLS 

Clear video display 

GET GET® (x1,y1) - (x2,y2)[,G],array name 

Save graphics from the GET@(10,4) - (20,9),A% 
video display in an array 

LINE LINE@(x1,y1)-(x2,y2),string expresslon[,B[F]] 

Draw a line, box or tilled LINE@(10,4)-(20,9)"*",B 
box using the first 
character of string 
expression 

LINE@(x1,y1)-(x2,y2),(RE]SET[,B[F]] 

Draw a line, box, or LINE@(8,8) - (120,41),SET,B 

tilled box with graphics 

characters 



PUT PUT@(x1,y1)-(x2,y2)[,action],array name 

Put a graphics PUT@(1,1)(50,10),SET,A% 

array on the screen. Action 
may be SET, RESET, AND, 

RESET RESET (x,y) RESET(5.8) 

Turns off the graphics 
block at the given point 

SET SET(x.y) SET(63.23) 

Turns on the graphics 
block at the given point 

ARITHMETIC FUNCTIONS 



Call Returns: 

ABS(exp) Absolute value of expression 

ATN(exp) Arctangent of expression 
(in radians) 

CDBL(exp) Double precision representation 
of expression 

CINT(exp) Integer representation of 
expression 

COS(exp) Cosine of expression (in radians) 

CSNG(exp) Single precision representation 
of expression 

EXP(exp) The constant e to the power of 
expression 

FlX(exp) Truncated integer of expression 

INT(exp) Largest integer representation of 
expression that is not greater 
than expression 

LOG(exp) Natural logarithm of expression 

RND(exp) A pseudo-random number. 

RND(O) returns a single precision 
value between and 1. RND 
(integer) returns a pseudo 
random number between 1 and 
integer inclusive. 

SGN(exp) 1 if expression>0 
if expression = 
- 1 if expression<0 



Example 

Y = ABS(A+B) 
PRINT ATN(A) 

A = CDBL(Y) 

B = CINT(B) 

A = COS(2.3) 
C = CSNG(X) 

B = EXP(C) 

J = FIX(A/B) 
C = INT(X + 3) 

D = LOG(Y-2) 

RND(O) 
RND(100) 



B = SGN(X + Y) 



SIN(exp) Sine of expression (in radians) B = SIN(A) 

SQR(exp) Square root of expression C = SQR(D) 

TAN(exp) Tangent of expression D = TAN(3.14) 

(in radians) 

STRING FUNCTIONS 



Call Operation 

ASC(string) Returns the ASCII value of 
the first character of string 

CHR$(exp) Returns a one-character 

string whose character has 
the ASCII code of 
expression 

FRE(string) Returns the number of 

bytes remaining in string 
space 

INKEYS Strobes the keyboard and 

returns a one-character 
string corresponding to key 
pressed during strobe (null 
string if no key is pressed! 

INSTR([n,]string1,string2) 

Returns the first position 
ol the first occurrence of 
string2 in stringl Search 
starts at the nth position. 

LEFTS(string.length) 

Returns leftmost length 
characters of the string 
expression 

LEN(string) Returns the length of string 
10 for null string) 

MID$(string.start[.length]) 

Returns characters from 
the middle of the string 
starting at the position 
specified to the end of the 
string of for length 
characters 



Example 

PRINT ASC(A$) 

PRINT CHR$(48) 



PRINT FRE(A$) 



INKEY$ 



INSTR(A$,":") 
INSTR(3,X$,Y$) 



B$ = LEFTS (X$.8) 



LEN(A$ + B$) 



A$ = MID$(X$.5.10) 



■-.D$(str!ng1,n[,m]) = string2 

On the left side of an Ml D$(K$,1,8) = L$ 

equation, replaces a portion 
of stringl with string2, 
starting at position n, 
for m characters 

RIGHT$(string, length) 

Returns rightmost length C$ = RIGHT$(X$.8) 

characters of the string 

expression 



PRINT STR$(35) 



X$ = STRING$(10,"A'-) 



Y$ = STRING$(100.42) 



STRS(exp) Returns a string 

representation of the 
numeric expression 

STRING$(count,string) 

Returns a string count 
long containing first 
character of string 

5TRING$(count,exp) 

Returns a string count 
long containing characters 
with ASCII code of numeric 
expression 

TIMES Returns a string of form PRINT TIMES 

mm/ddiyy hh:mm:ss that represents 
the elapsed time since 
Level III BASIC was 

VAL(string) Returns the numeric value PRINT VAL("3.V 
of the string representation 
of a number 



SPECIAL FUNCTIONS 



Function 




Operation 


Example 


ERL 




Returns line number of 
current error 


PRINT ERL 


ERR/2 + 1 




Returns code number of 
current error 


PRINT ERR/2 + 1 


FREInum 


ber) 


Returns number of unused 
bytes in memory 


FRE(O) 


INP(port) 




Returns the byte read from 


PRINT INP(21) 



the specified input port 



MEM Returns number of unused 

bytes in memory 

PEEK(add) Returns the byte 

read from the specified 
address 

POINT(x.y) Returns -1 if specified 
graphics block is "on." 
Returns if specified 
graphics block is "off." 
CK = x<128 and0< = y<48 

POS(dummy) Returns current position of 
cursor 

TAB(exp) Tabs cursor to specified 

position. Used only in PRINT 
statements. 



MEM 



PRINT PEEK (&2000) 



POINT(20.10) 



POS(O) 



PRINT TAB(20);X$ 



USRn(arg) Branches to machine 



USR2IY) 



VARPTR(var) Returns address of variable in I = VARPTR(X) 
memory 



ERROR MESSAGES 



Code 


Abbreviation 


Error Message 


1 


NF 


NEXT without FOR 


2 


SN 


Syntax error 


3 


RG 


Return without GOSUB 


4 


OD 


Out of data 


5 


FC 


Illegal function call 


6 


OV 


Overflow 


7 


OM 


Out of memory 


8 


UL 


Undefined line 


9 


BS 


Subscript out of range 


10 


DD 


Redimensioned array 


11 


/O 


Division by zero 


12 


ID 


Illegal direct 


13 


TM 


Type mismatch 


14 


OS 


Out of string space 


15 


LS 


Spring too long 


16 


ST 


String formula too complex 


17 


CN 


Can't continue 


18 


NR 


No RESUME 


19 


RW 


RESUME without error 


20 


UE 


Unprintable error 


21 


MO 


Missing operand 


22 


FD 


Bad file data 


23 


L3 


Disk BASIC only 



